﻿Imports tiendaRegalos
Public Class BuscarUsuario
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub btnBuscar_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnBuscar.Click
        Dim negocio = New UsuarioNegocio

        Dim lista = negocio.buscarPorNombre(Me.txtNombre.Text)

        dgUsuarios.DataSource = lista
        dgUsuarios.DataBind()
    End Sub
End Class